home *** CD-ROM | disk | FTP | other *** search
/ Aminet 19 / Aminet 19 (1997)(GTI - Schatztruhe)[!][Jun 1997].iso / Aminet / comm / tcp / MiamiHandyRexx.lha / MiamiStatus.rexx < prev   
OS/2 REXX Batch file  |  1997-04-22  |  421b  |  30 lines
  1. /*
  2. **  ARexx script to check Miami status v1.0
  3. **  By Alexandre Gabriel (a.k.a. Chryse) <chryse@mail.telepac.pt>
  4. */
  5. OPTIONS RESULTS
  6.  
  7. ADDRESS 'MIAMI.1'
  8.  
  9. SAY "Miami Status"
  10. SAY "------------"
  11. SAY " "
  12.  
  13. ISONLINE
  14.  
  15. GETSETTINGSNAME
  16. SAY "Settings:" result
  17.  
  18. IF RC=0 THEN
  19. DO
  20. SAY "Online: No"
  21. END
  22.  
  23. IF RC=1 THEN
  24. DO
  25. SAY "Online: Yes"
  26. END
  27.  
  28. GETONLINETIME
  29. SAY "Online for: " result/3600 "Hours / " result/60 "Minutes /" result "Seconds"
  30.